clear all
clc 
A=ones(1,8);
b=[1];
x0=[0.1;0.1;0.1;0.1;0.1;0.1;0.1;0.1];
L=zeros(8,1);
[x favl]=fmincon(@R,x0,[],[],A,b,L,[],@non1)


